EXITIF conditional loop exit:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Syntax:
~~~~~~~

  EXITIF <Expr>

Description:
~~~~~~~~~~~~
If the expresion <Expr> is true, the EXIT command is performed.

Example:
~~~~~~~~
  REPEAT
    nKey:=InKey(0)
    EXITIF nKey==K_ENTER or nKey==K_ESC
    DO CASE
      CASE nKey==K_UP
        ...
      CASE nKey==K_DOWN
        ...
      OTHERWISE
        ...
    ENDCASE
  ENDREPEAT
  ...


All pressed keys are handled, the loop is finished after pressing of the
ESC key or the Enter key.

Source file is Object.ch